From 8e1a73f22004016d715f89d443771db75be48056 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 17 Feb 2007 20:38:20 +0000 Subject: [PATCH] (pgg-gpg-process-region): Make USE-AGENT nil if PASSPHRASE is given. --- lisp/pgg-gpg.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/pgg-gpg.el b/lisp/pgg-gpg.el index 84bf81a858e..a2cd14eaae3 100644 --- a/lisp/pgg-gpg.el +++ b/lisp/pgg-gpg.el @@ -61,7 +61,7 @@ "GnuPG ID of your default identity.") (defun pgg-gpg-process-region (start end passphrase program args) - (let* ((use-agent (pgg-gpg-use-agent-p)) + (let* ((use-agent (and (null passphrase) (pgg-gpg-use-agent-p))) (output-file-name (pgg-make-temp-file "pgg-output")) (args `("--status-fd" "2" -- 2.30.2